1 2 3 4 5 6 7 | iSymbol = "z" '"Z" If iSymbol = LCase(iSymbol) Then MsgBox "Да", vbExclamation, "" Else MsgBox "Нет", vbExclamation, "" End If |
1 2 3 4 5 6 7 | iSymbol = "z" '"Z" If iSymbol = LCase(iSymbol) Then MsgBox "Да", vbExclamation, "" Else MsgBox "Нет", vbExclamation, "" End If |